home *** CD-ROM | disk | FTP | other *** search
/ Delphi Informant Complete 1995 - 2000 / Delphi Informant Complete 1995 to 2000.iso / Delphi Informant Magazine Complete Works SOURCE CODE 1998.rar / 1998 / May / di9805fn / StrTst01.dfm / StrTst01.txt
Text File  |  1997-12-14  |  3KB  |  169 lines

  1. object Form1: TForm1
  2.   Left = 261
  3.   Top = 108
  4.   Width = 414
  5.   Height = 428
  6.   Caption = 'HyperString Parsing Routines'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   OnCreate = FormCreate
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Label1: TLabel
  16.     Left = 201
  17.     Top = 54
  18.     Width = 32
  19.     Height = 13
  20.     Caption = 'Word: '
  21.   end
  22.   object Label2: TLabel
  23.     Left = 200
  24.     Top = 86
  25.     Width = 43
  26.     Height = 13
  27.     Caption = 'Position: '
  28.   end
  29.   object Label3: TLabel
  30.     Left = 232
  31.     Top = 24
  32.     Width = 22
  33.     Height = 13
  34.     Caption = 'File: '
  35.   end
  36.   object StartParseBtn: TButton
  37.     Left = 48
  38.     Top = 16
  39.     Width = 75
  40.     Height = 25
  41.     Caption = 'Start Parse'
  42.     TabOrder = 0
  43.     OnClick = StartParseBtnClick
  44.   end
  45.   object Memo1: TMemo
  46.     Left = 40
  47.     Top = 112
  48.     Width = 185
  49.     Height = 257
  50.     ScrollBars = ssBoth
  51.     TabOrder = 1
  52.     OnDblClick = Memo1DblClick
  53.   end
  54.   object StatusBar1: TStatusBar
  55.     Left = 0
  56.     Top = 382
  57.     Width = 406
  58.     Height = 19
  59.     Panels = <
  60.       item
  61.         Width = 150
  62.       end
  63.       item
  64.         Width = 50
  65.       end>
  66.     SimplePanel = False
  67.   end
  68.   object FindPositionBtn: TButton
  69.     Left = 48
  70.     Top = 48
  71.     Width = 113
  72.     Height = 25
  73.     Caption = 'Find Word Position'
  74.     TabOrder = 3
  75.     OnClick = FindPositionBtnClick
  76.   end
  77.   object FindWordBtn: TButton
  78.     Left = 48
  79.     Top = 80
  80.     Width = 121
  81.     Height = 25
  82.     Caption = 'Find Word at Position'
  83.     TabOrder = 4
  84.     OnClick = FindWordBtnClick
  85.   end
  86.   object WordEdit: TEdit
  87.     Left = 248
  88.     Top = 50
  89.     Width = 121
  90.     Height = 21
  91.     TabOrder = 5
  92.   end
  93.   object PosEdit: TEdit
  94.     Left = 248
  95.     Top = 82
  96.     Width = 121
  97.     Height = 21
  98.     TabOrder = 6
  99.     Text = '1'
  100.   end
  101.   object NextOfSameWordBtn: TButton
  102.     Left = 240
  103.     Top = 144
  104.     Width = 145
  105.     Height = 25
  106.     Caption = 'Next Example of Same Word'
  107.     TabOrder = 7
  108.     OnClick = NextOfSameWordBtnClick
  109.   end
  110.   object NextWordBtn: TButton
  111.     Left = 240
  112.     Top = 184
  113.     Width = 97
  114.     Height = 25
  115.     Caption = 'Next Word'
  116.     TabOrder = 8
  117.     OnClick = NextWordBtnClick
  118.   end
  119.   object PreviousWordBtn: TButton
  120.     Left = 240
  121.     Top = 224
  122.     Width = 97
  123.     Height = 25
  124.     Caption = 'Previous Word'
  125.     TabOrder = 9
  126.     OnClick = PreviousWordBtnClick
  127.   end
  128.   object SetTagDelimsBtn: TButton
  129.     Left = 240
  130.     Top = 264
  131.     Width = 97
  132.     Height = 25
  133.     Caption = 'Set Tag Delims'
  134.     TabOrder = 10
  135.     OnClick = SetTagDelimsBtnClick
  136.   end
  137.   object GetTaggedPhraseBtn: TButton
  138.     Left = 240
  139.     Top = 304
  140.     Width = 105
  141.     Height = 25
  142.     Caption = 'Get Tagged Phrase'
  143.     TabOrder = 11
  144.     OnClick = GetTaggedPhraseBtnClick
  145.   end
  146.   object GetNextTaggedPhraseBtn: TButton
  147.     Left = 240
  148.     Top = 344
  149.     Width = 129
  150.     Height = 25
  151.     Caption = 'Get Next Tagged Phrase'
  152.     TabOrder = 12
  153.     OnClick = GetNextTaggedPhraseBtnClick
  154.   end
  155.   object LoadFileBtn: TButton
  156.     Left = 136
  157.     Top = 16
  158.     Width = 75
  159.     Height = 25
  160.     Caption = 'Load File'
  161.     TabOrder = 13
  162.     OnClick = LoadFileBtnClick
  163.   end
  164.   object OpenDialog1: TOpenDialog
  165.     Left = 16
  166.     Top = 16
  167.   end
  168. end
  169.